/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_1 / issue_08 / font_progs / font_demo

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1c f4 20 3e 24 | 2e 46 6f 6e 74 50 72 6f |..... >$|.FontPro|
|00000010| 67 73 2e 46 6f 6e 74 5f | 64 65 6d 6f 0d 00 14 1c |gs.Font_|demo....|
|00000020| f4 20 41 6e 74 69 2d 61 | 6c 69 61 73 65 64 20 66 |. Anti-a|liased f|
|00000030| 6f 6e 74 20 64 65 6d 6f | 0d 00 1e 15 f4 20 62 79 |ont demo|..... by|
|00000040| 20 4b 65 69 74 68 20 4d | 69 6c 6e 65 72 0d 00 28 | Keith M|ilner..(|
|00000050| 05 f4 0d 00 32 39 f4 20 | 52 65 73 65 72 76 65 20 |....29. |Reserve |
|00000060| 61 20 62 6c 6f 63 6b 20 | 6f 66 20 6d 65 6d 6f 72 |a block |of memor|
|00000070| 79 20 66 6f 72 20 74 68 | 72 65 73 68 6f 6c 64 20 |y for th|reshold |
|00000080| 64 65 66 69 6e 69 74 69 | 6f 6e 73 0d 00 3c 13 de |definiti|ons..<..|
|00000090| 20 74 68 72 65 73 68 6f | 6c 64 25 20 31 37 0d 00 | thresho|ld% 17..|
|000000a0| 46 04 0d 00 50 47 f4 20 | 53 65 74 20 66 6f 6e 74 |F...PG. |Set font|
|000000b0| 20 70 72 65 66 69 78 20 | 73 6f 20 74 68 65 20 66 | prefix |so the f|
|000000c0| 6f 6e 74 20 6d 61 6e 61 | 67 65 72 20 6b 6e 6f 77 |ont mana|ger know|
|000000d0| 73 20 77 68 65 72 65 20 | 66 6f 6e 74 73 20 61 72 |s where |fonts ar|
|000000e0| 65 20 6f 6e 20 64 69 73 | 6b 0d 00 5a 1c 2a 53 45 |e on dis|k..Z.*SE|
|000000f0| 54 20 46 6f 6e 74 24 70 | 72 65 66 69 78 20 26 2e |T Font$p|refix &.|
|00000100| 46 6f 6e 74 73 0d 00 64 | 04 0d 00 6e 21 f4 20 43 |Fonts..d|...n!. C|
|00000110| 68 6f 6f 73 65 20 66 6f | 6e 74 20 74 6f 20 62 65 |hoose fo|nt to be|
|00000120| 20 64 69 73 70 6c 61 79 | 65 64 0d 00 78 1a 66 6f | display|ed..x.fo|
|00000130| 6e 74 24 3d 22 54 72 69 | 6e 69 74 79 2e 4d 65 64 |nt$="Tri|nity.Med|
|00000140| 69 75 6d 22 0d 00 82 04 | 0d 00 8c 1c f4 20 43 68 |ium"....|..... Ch|
|00000150| 6f 6f 73 65 20 66 6f 6e | 74 20 70 6f 69 6e 74 20 |oose fon|t point |
|00000160| 73 69 7a 65 0d 00 96 1b | 78 5f 70 6f 69 6e 74 73 |size....|x_points|
|00000170| 3d 34 30 3a 79 5f 70 6f | 69 6e 74 73 3d 34 30 0d |=40:y_po|ints=40.|
|00000180| 00 a0 04 0d 00 aa 3b f4 | 20 43 68 6f 6f 73 65 20 |......;.| Choose |
|00000190| 73 63 72 65 65 6e 20 72 | 65 73 6f 6c 75 74 69 6f |screen r|esolutio|
|000001a0| 6e 20 28 30 20 67 69 76 | 65 73 20 64 65 66 61 75 |n (0 giv|es defau|
|000001b0| 6c 74 20 78 3d 39 30 2c | 20 79 3d 34 35 29 0d 00 |lt x=90,| y=45)..|
|000001c0| b4 13 78 5f 72 65 73 3d | 30 3a 79 5f 72 65 73 3d |..x_res=|0:y_res=|
|000001d0| 30 0d 00 be 04 0d 00 c8 | 22 f4 20 41 73 6b 20 6d |0.......|". Ask m|
|000001e0| 61 6e 61 67 65 72 20 74 | 6f 20 66 69 6e 64 20 74 |anager t|o find t|
|000001f0| 68 65 20 66 6f 6e 74 0d | 00 d2 4b c8 99 22 46 6f |he font.|..K.."Fo|
|00000200| 6e 74 5f 46 69 6e 64 46 | 6f 6e 74 22 2c 2c 66 6f |nt_FindF|ont",,fo|
|00000210| 6e 74 24 2c 78 5f 70 6f | 69 6e 74 73 2a 31 36 2c |nt$,x_po|ints*16,|
|00000220| 79 5f 70 6f 69 6e 74 73 | 2a 31 36 2c 78 5f 72 65 |y_points|*16,x_re|
|00000230| 73 2c 79 5f 72 65 73 20 | b8 20 74 72 69 6e 69 74 |s,y_res |. trinit|
|00000240| 79 25 0d 00 dc 04 0d 00 | e6 1a eb 31 32 20 3a 20 |y%......|...12 : |
|00000250| f4 20 31 36 20 63 6f 6c | 6f 75 72 20 6d 6f 64 65 |. 16 col|our mode|
|00000260| 0d 00 f0 04 0d 00 fa 2e | f4 20 53 65 74 20 75 70 |........|. Set up|
|00000270| 20 74 68 72 65 73 68 6f | 6c 64 20 74 61 62 6c 65 | thresho|ld table|
|00000280| 20 66 6f 72 20 61 6e 74 | 69 2d 61 6c 69 61 73 69 | for ant|i-aliasi|
|00000290| 6e 67 0d 01 04 3e 6e 5f | 63 6f 6c 73 25 3d 38 20 |ng...>n_|cols%=8 |
|000002a0| 3a 20 f4 20 6e 75 6d 62 | 65 72 20 6f 66 63 6f 6c |: . numb|er ofcol|
|000002b0| 6f 75 72 73 20 74 6f 20 | 62 65 20 75 73 65 64 20 |ours to |be used |
|000002c0| 69 6e 20 61 6e 74 69 2d | 61 6c 69 61 73 69 6e 67 |in anti-|aliasing|
|000002d0| 0d 01 0e 48 3f 74 68 72 | 65 73 68 6f 6c 64 25 3d |...H?thr|eshold%=|
|000002e0| 6e 5f 63 6f 6c 73 25 2d | 32 20 20 20 3a f4 20 63 |n_cols%-|2   :. c|
|000002f0| 6f 6c 6f 75 72 20 6f 66 | 66 73 65 74 20 28 66 6f |olour of|fset (fo|
|00000300| 72 65 67 6e 64 20 26 20 | 62 61 63 6b 67 6e 64 20 |regnd & |backgnd |
|00000310| 61 73 73 75 6d 65 64 29 | 0d 01 18 32 74 68 72 65 |assumed)|...2thre|
|00000320| 73 68 6f 6c 64 25 3f 31 | 3d 32 20 20 20 20 20 20 |shold%?1|=2      |
|00000330| 20 20 20 20 3a f4 20 31 | 73 74 20 74 68 72 65 73 |    :. 1|st thres|
|00000340| 68 6f 6c 64 20 76 61 6c | 75 65 0d 01 22 22 74 68 |hold val|ue..""th|
|00000350| 72 65 73 68 6f 6c 64 25 | 3f 32 3d 34 20 20 20 20 |reshold%|?2=4    |
|00000360| 20 20 20 20 20 20 3a f4 | 20 32 6e 64 0d 01 2c 22 |      :.| 2nd..,"|
|00000370| 74 68 72 65 73 68 6f 6c | 64 25 3f 33 3d 36 20 20 |threshol|d%?3=6  |
|00000380| 20 20 20 20 20 20 20 20 | 3a f4 20 33 72 64 0d 01 |        |:. 3rd..|
|00000390| 36 22 74 68 72 65 73 68 | 6f 6c 64 25 3f 34 3d 38 |6"thresh|old%?4=8|
|000003a0| 20 20 20 20 20 20 20 20 | 20 20 3a f4 20 34 74 68 |        |  :. 4th|
|000003b0| 0d 01 40 22 74 68 72 65 | 73 68 6f 6c 64 25 3f 35 |..@"thre|shold%?5|
|000003c0| 3d 31 30 20 20 20 20 20 | 20 20 20 20 3a f4 20 35 |=10     |    :. 5|
|000003d0| 74 68 0d 01 4a 22 74 68 | 72 65 73 68 6f 6c 64 25 |th..J"th|reshold%|
|000003e0| 3f 36 3d 31 32 20 20 20 | 20 20 20 20 20 20 3a f4 |?6=12   |      :.|
|000003f0| 20 36 74 68 0d 01 54 22 | 74 68 72 65 73 68 6f 6c | 6th..T"|threshol|
|00000400| 64 25 3f 37 3d 31 34 20 | 20 20 20 20 20 20 20 20 |d%?7=14 |        |
|00000410| 3a f4 20 37 74 68 0d 01 | 5e 32 3f 74 68 72 65 73 |:. 7th..|^2?thres|
|00000420| 68 6f 6c 64 25 3d 26 46 | 46 20 20 20 20 20 20 20 |hold%=&F|F       |
|00000430| 20 20 3a f4 20 45 6e 64 | 20 6f 66 20 74 61 62 6c |  :. End| of tabl|
|00000440| 65 20 6d 61 72 6b 65 72 | 0d 01 68 04 0d 01 72 29 |e marker|..h...r)|
|00000450| f4 20 50 61 73 73 20 74 | 68 72 65 73 68 6f 6c 64 |. Pass t|hreshold|
|00000460| 20 74 61 62 6c 65 20 74 | 6f 20 66 6f 6e 74 20 73 | table t|o font s|
|00000470| 79 73 74 65 6d 0d 01 7c | 26 c8 99 22 46 6f 6e 74 |ystem..||&.."Font|
|00000480| 5f 53 65 74 54 68 72 65 | 73 68 6f 6c 64 73 22 2c |_SetThre|sholds",|
|00000490| 2c 74 68 72 65 73 68 6f | 6c 64 25 0d 01 86 04 0d |,thresho|ld%.....|
|000004a0| 01 90 29 f4 20 53 65 74 | 20 75 70 20 63 6f 6c 6f |..). Set| up colo|
|000004b0| 75 72 73 20 61 6e 64 20 | 72 65 67 69 73 74 65 72 |urs and |register|
|000004c0| 73 20 74 6f 20 75 73 65 | 0d 01 9a 39 62 63 6f 6c |s to use|...9bcol|
|000004d0| 5f 72 65 67 25 3d 30 20 | 20 20 20 20 20 20 20 20 |_reg%=0 |        |
|000004e0| 20 20 20 20 3a f4 20 62 | 61 63 6b 67 72 6f 75 6e |    :. b|ackgroun|
|000004f0| 64 20 63 6f 6c 6f 75 72 | 20 72 65 67 69 73 74 65 |d colour| registe|
|00000500| 72 0d 01 a4 37 62 63 6f | 6c 5f 52 25 3d 30 20 20 |r...7bco|l_R%=0  |
|00000510| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 |        |     :. |
|00000520| 62 61 63 6b 67 72 6f 75 | 6e 64 20 52 45 44 20 63 |backgrou|nd RED c|
|00000530| 6f 6d 70 6f 6e 65 6e 74 | 0d 01 ae 39 62 63 6f 6c |omponent|...9bcol|
|00000540| 5f 47 25 3d 26 46 46 20 | 20 20 20 20 20 20 20 20 |_G%=&FF |        |
|00000550| 20 20 20 20 3a f4 20 62 | 61 63 6b 67 72 6f 75 6e |    :. b|ackgroun|
|00000560| 64 20 47 52 45 45 4e 20 | 63 6f 6d 70 6f 6e 65 6e |d GREEN |componen|
|00000570| 74 0d 01 b8 38 62 63 6f | 6c 5f 42 25 3d 26 46 46 |t...8bco|l_B%=&FF|
|00000580| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 |        |     :. |
|00000590| 62 61 63 6b 67 72 6f 75 | 6e 64 20 42 4c 55 45 20 |backgrou|nd BLUE |
|000005a0| 63 6f 6d 70 6f 6e 65 6e | 74 0d 01 c2 04 0d 01 cc |componen|t.......|
|000005b0| 44 66 63 6f 6c 5f 72 65 | 67 25 3d 31 20 20 20 20 |Dfcol_re|g%=1    |
|000005c0| 20 20 20 20 20 20 20 20 | 20 3a f4 20 31 73 74 20 |        | :. 1st |
|000005d0| 66 6f 72 65 67 72 6f 75 | 6e 64 20 63 6f 6c 6f 75 |foregrou|nd colou|
|000005e0| 72 20 72 65 67 69 73 74 | 65 72 20 74 6f 20 75 73 |r regist|er to us|
|000005f0| 65 0d 01 d6 37 66 63 6f | 6c 5f 6f 66 66 73 65 74 |e...7fco|l_offset|
|00000600| 25 3d 6e 5f 63 6f 6c 73 | 25 2d 32 20 20 3a f4 20 |%=n_cols|%-2  :. |
|00000610| 66 6f 72 65 67 72 6f 75 | 6e 64 20 63 6f 6c 6f 75 |foregrou|nd colou|
|00000620| 72 20 6f 66 66 73 65 74 | 0d 01 e0 37 66 63 6f 6c |r offset|...7fcol|
|00000630| 5f 52 25 3d 30 20 20 20 | 20 20 20 20 20 20 20 20 |_R%=0   |        |
|00000640| 20 20 20 20 3a f4 20 66 | 6f 72 65 67 72 6f 75 6e |    :. f|oregroun|
|00000650| 64 20 52 45 44 20 63 6f | 6d 70 6f 6e 65 6e 74 0d |d RED co|mponent.|
|00000660| 01 ea 39 66 63 6f 6c 5f | 47 25 3d 30 20 20 20 20 |..9fcol_|G%=0    |
|00000670| 20 20 20 20 20 20 20 20 | 20 20 20 3a f4 20 66 6f |        |   :. fo|
|00000680| 72 65 67 72 6f 75 6e 64 | 20 47 52 45 45 4e 20 63 |reground| GREEN c|
|00000690| 6f 6d 70 6f 6e 65 6e 74 | 0d 01 f4 38 66 63 6f 6c |omponent|...8fcol|
|000006a0| 5f 42 25 3d 30 20 20 20 | 20 20 20 20 20 20 20 20 |_B%=0   |        |
|000006b0| 20 20 20 20 3a f4 20 66 | 6f 72 65 67 72 6f 75 6e |    :. f|oregroun|
|000006c0| 64 20 42 4c 55 45 20 63 | 6f 6d 70 6f 6e 65 6e 74 |d BLUE c|omponent|
|000006d0| 0d 01 fe 04 0d 02 08 32 | f4 20 63 6f 6e 76 65 72 |.......2|. conver|
|000006e0| 74 20 52 47 42 20 6c 65 | 76 65 6c 73 20 74 6f 20 |t RGB le|vels to |
|000006f0| 61 20 33 32 20 62 69 74 | 20 6e 6f 2e 20 26 42 42 |a 32 bit| no. &BB|
|00000700| 47 47 52 52 30 30 0d 02 | 12 3c 62 63 6f 6c 25 3d |GGRR00..|.<bcol%=|
|00000710| 28 62 63 6f 6c 5f 52 25 | 20 3c 3c 20 26 30 38 29 |(bcol_R%| << &08)|
|00000720| 2b 28 62 63 6f 6c 5f 47 | 25 20 3c 3c 20 26 31 30 |+(bcol_G|% << &10|
|00000730| 29 2b 28 62 63 6f 6c 5f | 42 25 20 3c 3c 20 26 31 |)+(bcol_|B% << &1|
|00000740| 38 29 0d 02 1c 3c 66 63 | 6f 6c 25 3d 28 66 63 6f |8)...<fc|ol%=(fco|
|00000750| 6c 5f 52 25 20 3c 3c 20 | 26 30 38 29 2b 28 66 63 |l_R% << |&08)+(fc|
|00000760| 6f 6c 5f 47 25 20 3c 3c | 20 26 31 30 29 2b 28 66 |ol_G% <<| &10)+(f|
|00000770| 63 6f 6c 5f 42 25 20 3c | 3c 20 26 31 38 29 0d 02 |col_B% <|< &18)..|
|00000780| 26 04 0d 02 30 30 f4 20 | 50 61 73 73 20 64 61 74 |&...00. |Pass dat|
|00000790| 61 20 74 6f 20 66 6f 6e | 74 20 73 79 73 74 65 6d |a to fon|t system|
|000007a0| 20 74 6f 20 73 65 74 20 | 75 70 20 70 61 6c 65 74 | to set |up palet|
|000007b0| 74 65 0d 02 3a 45 c8 99 | 22 46 6f 6e 74 5f 53 65 |te..:E..|"Font_Se|
|000007c0| 74 50 61 6c 65 74 74 65 | 22 2c 2c 62 63 6f 6c 5f |tPalette|",,bcol_|
|000007d0| 72 65 67 25 2c 66 63 6f | 6c 5f 72 65 67 25 2c 66 |reg%,fco|l_reg%,f|
|000007e0| 63 6f 6c 5f 6f 66 66 73 | 65 74 25 2c 62 63 6f 6c |col_offs|et%,bcol|
|000007f0| 25 2c 66 63 6f 6c 25 0d | 02 44 04 0d 02 4e 23 6d |%,fcol%.|.D...N#m|
|00000800| 65 73 73 61 67 65 24 3d | 22 41 6e 20 61 6e 74 69 |essage$=|"An anti|
|00000810| 2d 61 6c 69 61 73 65 64 | 20 66 6f 6e 74 22 0d 02 |-aliased| font"..|
|00000820| 58 04 0d 02 62 25 f4 20 | 50 61 69 6e 74 20 6d 65 |X...b%. |Paint me|
|00000830| 73 73 61 67 65 20 6f 6e | 20 73 63 72 65 65 6e 20 |ssage on| screen |
|00000840| 69 6e 20 66 6f 6e 74 0d | 02 6c 26 c8 99 22 46 6f |in font.|.l&.."Fo|
|00000850| 6e 74 5f 50 61 69 6e 74 | 22 2c 2c 6d 65 73 73 61 |nt_Paint|",,messa|
|00000860| 67 65 24 2c 26 31 30 2c | 30 2c 37 30 30 0d 02 76 |ge$,&10,|0,700..v|
|00000870| 04 0d 02 80 05 e0 0d ff |                         |........|        |
+--------+-------------------------+-------------------------+--------+--------+